
* Set this Working Directory to the Folder with the Replication Files
cd "C:/Steven/GDrive/Research Files/Clark-Rogers/Descriptive Representation/APSR Final Submission/Replication/"

***
* Table A-1
***
		eststo clear	
		****
		* Replicating Stauffer Table 1 ~ Column 1
		****
		
			* Stauffer Data
			use "Data/Formatted Data/Stauffer-Congress-RegressionData.dta", clear 

			* Stauffer Replication
				eststo: quietly xtmixed efficacy_1 Belief_WomenCongress Female Ideology Independent Republican StrongPartisan ///
						FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
						USSenator_Female MoC_Female True_WomenStateLeg i.year || State:
			
			* Clark-Rogers Data
			use "Data/Formatted Data/Clark-Rogers-RegressionData.dta", clear
				
			* Clark-Rogers Gender Replication
				eststo: quietly xtmixed ExternalEfficacy_Congress Belief_WomenCongress Female Ideology Independent Republican StrongPartisan ///
						FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
						USSenator_Female MoC_Female True_WomenStateLeg || State:
			
			* Clark-Rogers Race Replication
				eststo: quietly xtmixed ExternalEfficacy_Congress Belief_BlackCongress Female Ideology Independent Republican StrongPartisan ///
						FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed ///
						USSenator_Black MoC_Black True_BlackStateLeg || State:
			
		***
		* Replicating Stauffer Table 1 ~ Column 2
		***

			* Stauffer Replication Data
			use "Data/Formatted Data/Stauffer-Congress-RegressionData.dta", clear 

			eststo: quietly xtmixed efficacy_1 Belief_WomenCongress Female c.Belief_WomenCongress#c.Female Ideology Independent Republican StrongPartisan ///
						FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
						USSenator_Female MoC_Female True_WomenStateLeg c.USSenator_Female#c.Female c.MoC_Female#c.Female c.True_WomenStateLeg#c.Female i.year || State:

			* Clark-Rogers Data
			use "Data/Formatted Data/Clark-Rogers-RegressionData.dta", clear
				
			* Clark-Rogers Gender Replication
				eststo: quietly xtmixed ExternalEfficacy_Congress Belief_WomenCongress Female c.Belief_WomenCongress#c.Female Ideology Independent Republican StrongPartisan ///
						FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
						USSenator_Female MoC_Female True_WomenStateLeg c.USSenator_Female#c.Female c.MoC_Female#c.Female c.True_WomenStateLeg#c.Female || State:
			
			* Clark-Rogers Race Replication			
				eststo: quietly xtmixed ExternalEfficacy_Congress Belief_BlackCongress c.Belief_BlackCongress#c.Black  Female Ideology Independent Republican StrongPartisan ///
						FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed ///
						USSenator_Black MoC_Black True_BlackStateLeg c.USSenator_Black#c.Black c.MoC_Black#c.Black c.True_BlackStateLeg#c.Black || State:
						
		esttab using "Tables/Appendix-Table-A-1.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
				se(3) star(* 0.05) /// Standard Errors at 3 Decimals
				order(Belief_WomenCongress Belief_BlackCongress Female Black c.Belief_WomenCongress#c.Female c.Belief_BlackCongress#c.Black Ideology Independent Republican StrongPartisan ///
						FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
						USSenator_Female MoC_Female True_WomenStateLeg c.USSenator_Female#c.Female c.MoC_Female#c.Female c.True_WomenStateLeg#c.Female ///
						USSenator_Black MoC_Black True_BlackStateLeg c.USSenator_Black#c.Black c.MoC_Black#c.Black c.True_BlackStateLeg#c.Black) ///
				varwidth(50) /// Limit Label to 35 characters, also needed for wrap option
				wrap /// Wraps long variable names
				eqlabels(none) /// Suppress Equation Labels
				coeflabels(c.Age$.c.Age "Age x. age") ///
				drop(*.year lns1_1_1:_cons lnsig_e:_cons) /// Drop Random Effect Parameters
				nonumbers ///
				b(3) /// Three Decimal Places for Coefficients
				mtitles("Stauffer - Women" "Clark-Rogers - Women" "Clark-Rogers  - Blacks" "Stauffer - Women" "Clark-Rogers - Women" "Clark-Rogers - Blacks") ///
				nogaps ///
				stats(N ll, fmt(0 1) labels("N" "Log-Likelihood") ) ///  
			title(Table A-1: Regression Models: Perceptions of Women's and Black's inclusion in Congress and External Efficacy) ///
			nonotes ///
			addnote("Standard errors in parentheses. * p < 0.05") ///
			nogap ///
			label 
		

***
* Table A-2
***
	
	eststo clear	
	* Stauffer Replication Data
	use "Data/Formatted Data/Stauffer-StateLeg-RegressionData.dta", clear 

	*Additive No Perceptions
	eststo:  quietly meoprobit RepPeopleLikeMe_StateLeg True_WomenStateLeg Female Ideology State_Ideology c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
	Age c.Age#c.Age White CollegeDegree Employed Religiosity if Belief_WomenStateLeg!=. ||State: , cov(uns) 
	
	*Interactive No Perceptions
	eststo: quietly meoprobit RepPeopleLikeMe_StateLeg True_WomenStateLeg Female c.True_WomenStateLeg#c.Female Ideology State_Ideology  c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
		Age c.Age#c.Age White CollegeDegree Employed Religiosity if Belief_WomenStateLeg!=. ||State: , cov(uns) 
	
	*Additive Perceptions
	eststo:	quietly meoprobit RepPeopleLikeMe_StateLeg True_WomenStateLeg Belief_WomenStateLeg Female Ideology State_Ideology c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
		Age c.Age#c.Age White CollegeDegree Employed Religiosity||State: , cov(uns) 
	
	*Interactive Perceptions 
	eststo: quietly	meoprobit RepPeopleLikeMe_StateLeg True_WomenStateLeg Belief_WomenStateLeg Female c.True_WomenStateLeg#c.Female c.Belief_WomenStateLeg#c.Female Ideology State_Ideology  c.Ideology#c.State_Ideology Congruence ///		
	Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age White CollegeDegree Employed Religiosity||State: , cov(uns)
		
	esttab using "Tables/Appendix-Table-A-2.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
			order(True_WomenStateLeg Belief_WomenStateLeg Female c.True_WomenStateLeg#c.Female c.Belief_WomenStateLeg#c.Female Ideology State_Ideology  c.Ideology#c.State_Ideology Congruence ///		
			Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age White CollegeDegree Employed Religiosity) ///
			eqlabels(none) /// Suppress Equation Labels
			mtitles("(1)" "(2)" "(3)" "(4)") ///
			varwidth(42) /// Limit Label to 35 characters, also needed for wrap option
			wrap /// Wraps long variable names
			se(3) star(* 0.05) /// Standard Errors at 3 Decimals
			nonumbers ///
			b(3) /// Three Decimal Places for Coefficients
			drop(var(_cons[State])) ///
			stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
			title(Table A-2: Stauffer Study, Ordered Probit Models: Perceptions of Women's Inclusion in State Legislatures and Evaluations of State Responsiveness)       ///
			nogap ///
			label 

***
* Table A-3
***

use "Data/Formatted Data/Clark-Rogers-RegressionData.dta", clear
		
	eststo clear
	
	*Additive No Perceptions
	eststo: quietly meoprobit RepPeopleLikeMe_StateLeg True_WomenStateLeg Female Ideology State_Ideology c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
	Age c.Age#c.Age White CollegeDegree Employed Religiosity if Belief_WomenStateLeg!=. ||State: , cov(uns) 
	
	*Interactive No Perceptions
	eststo: quietly meoprobit RepPeopleLikeMe_StateLeg True_WomenStateLeg Female c.True_WomenStateLeg#c.Female Ideology State_Ideology  c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
		Age c.Age#c.Age White CollegeDegree Employed Religiosity if Belief_WomenStateLeg!=. ||State: , cov(uns) 
		
	*Additive Perceptions
	eststo:	quietly meoprobit RepPeopleLikeMe_StateLeg True_WomenStateLeg Belief_WomenStateLeg Female Ideology State_Ideology c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
		Age c.Age#c.Age White CollegeDegree Employed Religiosity||State: , cov(uns) 
	
	*margins, at(Ideology=(7) State_Ideology = (70 18)) contrast(atcontrast(r._at) nowald) post

	*Interactive Perceptions 
	eststo: quietly meoprobit RepPeopleLikeMe_StateLeg True_WomenStateLeg Belief_WomenStateLeg Female c.True_WomenStateLeg#c.Female c.Belief_WomenStateLeg#c.Female Ideology State_Ideology  c.Ideology#c.State_Ideology Congruence ///		
	Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age White CollegeDegree Employed Religiosity||State: , cov(uns)

	esttab using "Tables/Appendix-Table-A-3.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
			order(True_WomenStateLeg Belief_WomenStateLeg Female c.True_WomenStateLeg#c.Female c.Belief_WomenStateLeg#c.Female Ideology State_Ideology  c.Ideology#c.State_Ideology Congruence ///		
			Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age White CollegeDegree Employed Religiosity) ///
			eqlabels(none) /// Suppress Equation Labels
			mtitles("(1)" "(2)" "(3)" "(4)") ///
			varwidth(42) /// Limit Label to 35 characters, also needed for wrap option
			wrap /// Wraps long variable names
			se(3) star(* 0.05) /// Standard Errors at 3 Decimals
			nonumbers ///
			b(3) /// Three Decimal Places for Coefficients
			drop(var(_cons[State]) ) ///
			stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
			title(Table A-3: Current Study, Ordered Probit Models: Perceptions of Women's Inclusion in State Legislatures and Evaluations of State Responsiveness)       ///
			nogap ///
			label 

***
* Table A-4
***

eststo clear
	
	*Additive No Perceptions
	eststo: quietly meoprobit RepPeopleLikeMe_StateLeg True_BlackStateLeg Female Ideology State_Ideology c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
	Age c.Age#c.Age Black CollegeDegree Employed Religiosity if Belief_BlackStateLeg!=. ||State: , cov(uns) 
	
	*Interactive No Perceptions
	eststo: quietly meoprobit RepPeopleLikeMe_StateLeg True_BlackStateLeg Female c.True_BlackStateLeg#c.Black Ideology State_Ideology  c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
		Age c.Age#c.Age Black CollegeDegree Employed Religiosity if Belief_BlackStateLeg!=. ||State: , cov(uns) 
	
	*Additive Perceptions
	eststo:	quietly meoprobit RepPeopleLikeMe_StateLeg True_BlackStateLeg Belief_BlackStateLeg Female Ideology State_Ideology c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
		Age c.Age#c.Age Black CollegeDegree Employed Religiosity||State: , cov(uns) 
	
	*Interactive Perceptions 
	eststo: quietly	meoprobit RepPeopleLikeMe_StateLeg True_BlackStateLeg Belief_BlackStateLeg Female c.True_BlackStateLeg#c.Black c.Belief_BlackStateLeg#c.Black Ideology State_Ideology c.Ideology#c.State_Ideology Congruence ///		
	Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity||State: , cov(uns)

	esttab using "Tables/Appendix-Table-A-4.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
			order(True_BlackStateLeg Belief_BlackStateLeg Female c.True_BlackStateLeg#c.Black c.Belief_BlackStateLeg#c.Black Ideology State_Ideology c.Ideology#c.State_Ideology Congruence ///		
			Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity) ///
			eqlabels(none) /// Suppress Equation Labels
			mtitles("(1)" "(2)" "(3)" "(4)") ///
			varwidth(42) /// Limit Label to 35 characters, also needed for wrap option
			wrap /// Wraps long variable names
			se(3) star(* 0.05) /// Standard Errors at 3 Decimals
			nonumbers ///
			b(3) /// Three Decimal Places for Coefficients
			drop(var(_cons[State]) ) ///
			stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
			title(Table A-4: Current Study, Ordered Probit Models: Perceptions of Blacks' Inclusion in State Legislatures and Evaluations of State Responsiveness)       ///
			nogap ///
			label 

****
* Table A-8
****
eststo clear

use "Data/Formatted Data/Clark-Rogers-RegressionData.dta", clear

eststo: quietly xtmixed ExternalEfficacy_Congress Belief_WomenCongress Fem_Tesler Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
				USSenator_Female MoC_Female True_WomenStateLeg || State:
				
eststo: quietly xtmixed ExternalEfficacy_Congress Belief_WomenCongress Fem_Tesler c.Belief_WomenCongress#c.Fem_Tesler Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
				USSenator_Female MoC_Female True_WomenStateLeg || State:
	
esttab using "Tables/Appendix-Table-A-8.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
		se(3) star(* 0.05) /// Standard Errors at 3 Decimals
		order(Belief_WomenCongress Fem_Tesler c.Belief_WomenCongress#c.Fem_Tesler  Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
				USSenator_Female MoC_Female True_WomenStateLeg) ///
		varwidth(50) /// Limit Label to 35 characters, also needed for wrap option
		wrap /// Wraps long variable names
		eqlabels(none) /// Suppress Equation Labels
		coeflabels(c.Age$.c.Age "Age x. age") ///
		drop(lns1_1_1:_cons lnsig_e:_cons) /// Drop Random Effect Parameters
		nonumbers ///
		b(3) /// Three Decimal Places for Coefficients
		mtitles("(1)" "(2)") ///
		nogaps ///
		stats(N ll, fmt(0 1) labels("N" "Log-Likelihood") ) ///  
	title(Table A-8: Regression Models: Perceptions of Women's inclusion in Congress and External Efficacy) ///
	nonotes ///
	addnote("Standard errors in parentheses. * p < 0.05") ///
	nogap ///
	label 

***
* Table A-9
***
eststo clear

	eststo: quietly meoprobit Trust_Congress_Pre Belief_WomenCongress Fem_Tesler Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
				USSenator_Female MoC_Female True_WomenStateLeg  ||State: , cov(uns) 

		eststo: quietly meoprobit Trust_Congress_Pre Belief_WomenCongress Fem_Tesler c.Belief_WomenCongress#c.Fem_Tesler Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
				USSenator_Female MoC_Female True_WomenStateLeg  ||State: , cov(uns) 
		
		esttab using "Tables/Appendix-Table-A-9.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
		se(3) star(* 0.05) /// Standard Errors at 3 Decimals
		order(Belief_WomenCongress Fem_Tesler c.Belief_WomenCongress#c.Fem_Tesler Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
				USSenator_Female MoC_Female True_WomenStateLeg) ///
		varwidth(50) /// Limit Label to 35 characters, also needed for wrap option
		wrap /// Wraps long variable names
		eqlabels(none) /// Suppress Equation Labels
		coeflabels(c.Age$.c.Age "Age x. age") ///
		nonumbers ///
		b(3) /// Three Decimal Places for Coefficients
		mtitles("(1)" "(2)") ///
		drop(var(_cons[State])) ///
		nogaps ///
		stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
	title(Table A-9: Ordered Probit Models: Perceptions of Women's inclusion in Congress, Sexism, and Trust in Congress) ///
	nonotes ///
	addnote("Standard errors in parentheses. * p < 0.05") ///
	nogap ///
	label 

***
* Table A-10
****
eststo clear

eststo: quietly meoprobit  RepPeopleLikeMe_StateLeg Belief_WomenStateLeg True_WomenStateLeg Fem_Tesler Female Ideology ///
		State_Ideology  c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age White CollegeDegree Employed Religiosity||State: , cov(uns)

eststo:	quietly meoprobit RepPeopleLikeMe_StateLeg Belief_WomenStateLeg True_WomenStateLeg Fem_Tesler Female c.Belief_WomenStateLeg#c.Fem_Tesler c.True_WomenStateLeg#c.Fem_Tesler Ideology ///
		State_Ideology  c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age White CollegeDegree Employed Religiosity||State: , cov(uns)

		
esttab using "Tables/Appendix-Table-A-10.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
			order(Belief_WomenStateLeg True_WomenStateLeg Fem_Tesler Female c.Belief_WomenStateLeg#c.Fem_Tesler c.True_WomenStateLeg#c.Fem_Tesler ///
			Ideology State_Ideology  c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age White CollegeDegree Employed Religiosity) ///
			eqlabels(none) /// Suppress Equation Labels
			mtitles("(1)" "(2)" "(3)" "(4)" "(5)" "(6)") ///
			varwidth(42) /// Limit Label to 35 characters, also needed for wrap option
			wrap /// Wraps long variable names
			se(3) star(* 0.05) /// Standard Errors at 3 Decimals
			nonumbers ///
			b(3) /// Three Decimal Places for Coefficients
			drop(var(_cons[State]) ) ///
			stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
			title(Table A-10: Ordered Probit Models: Perceptions of Women in State Legislatures and Responsiveness of State Legislatures)       ///
			nogap ///
			label 
			
***
* Table A-11
***
eststo clear

eststo: quietly meoprobit Trust_StateLeg_Pre Belief_WomenStateLeg True_WomenStateLeg Fem_Tesler Female Ideology ///
		State_Ideology  c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age White CollegeDegree Employed Religiosity||State: , cov(uns)

		eststo: quietly meoprobit Trust_StateLeg_Pre Belief_WomenStateLeg True_WomenStateLeg Fem_Tesler c.Belief_WomenStateLeg#c.Fem_Tesler Female c.True_WomenStateLeg#c.Fem_Tesler Ideology ///
		State_Ideology  c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age White CollegeDegree Employed Religiosity||State: , cov(uns)

			esttab using "Tables/Appendix-Table-A-11.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
			order(Belief_WomenStateLeg True_WomenStateLeg Fem_Tesler Female c.Belief_WomenStateLeg#c.Fem_Tesler c.True_WomenStateLeg#c.Fem_Tesler ///
			Ideology State_Ideology  c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age White CollegeDegree Employed Religiosity) ///
			eqlabels(none) /// Suppress Equation Labels
			mtitles("(1)" "(2)" "(3)" "(4)") ///
			varwidth(42) /// Limit Label to 35 characters, also needed for wrap option
			wrap /// Wraps long variable names
			se(3) star(* 0.05) /// Standard Errors at 3 Decimals
			nonumbers ///
			b(3) /// Three Decimal Places for Coefficients
			drop(var(_cons[State]) ) ///
			stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
			title(Table A-11: Ordered Probit Models: Perceptions of Women in State Legislatures and Trust in State Legislatures)       ///
			nogap ///
			label 

***
* Table A-12
***
eststo clear
	
	eststo: quietly xtmixed ExternalEfficacy_Congress Belief_BlackCongress RR_Tesler Female Ideology Independent Republican StrongPartisan ///
					FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed USSenator_Black MoC_Black True_BlackStateLeg || State:
		
	eststo: quietly xtmixed ExternalEfficacy_Congress Belief_BlackCongress RR_Tesler c.RR_Tesler#c.Belief_BlackCongress Female Ideology Independent Republican StrongPartisan ///
					FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed USSenator_Black MoC_Black True_BlackStateLeg || State:			

	eststo: quietly xtmixed ExternalEfficacy_Congress Belief_BlackCongress RR_Kinder Female Ideology Independent Republican StrongPartisan ///
					FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed USSenator_Black MoC_Black True_BlackStateLeg || State:
		
	eststo: quietly xtmixed ExternalEfficacy_Congress Belief_BlackCongress RR_Kinder c.RR_Kinder#c.Belief_BlackCongress Female Ideology Independent Republican StrongPartisan ///
					FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed USSenator_Black MoC_Black True_BlackStateLeg || State:	
					
	esttab using "Tables/Appendix-Table-A-12.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
		se(3) star(* 0.05) /// Standard Errors at 3 Decimals
		order(Belief_BlackCongress RR_Tesler RR_Kinder c.RR_Tesler#c.Belief_BlackCongress c.RR_Kinder#c.Belief_BlackCongress Female Ideology Independent Republican StrongPartisan ///
					FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed USSenator_Black MoC_Black True_BlackStateLeg) ///
		varwidth(50) /// Limit Label to 35 characters, also needed for wrap option
		wrap /// Wraps long variable names
		eqlabels(none) /// Suppress Equation Labels
		coeflabels(c.Age$.c.Age "Age x. age" c.RR_Kinder#c.Belief_BlackCongress "Racial Resentment (Kinder & Sanders) x Est. % Black") ///
		drop(lns1_1_1:_cons lnsig_e:_cons) /// Drop Random Effect Parameters
		nonumbers ///
		b(3) /// Three Decimal Places for Coefficients
		mtitles("(1)" "(2)" "(3)" "(4)") ///
		nogaps ///
		stats(N ll, fmt(0 1) labels("N" "Log-Likelihood") ) ///  
	title(Table A-12: Regression Models: Perceptions of Blacks' inclusion in Congress and External Efficacy) ///
	nonotes ///
	addnote("Standard errors in parentheses. * p < 0.05") ///
	nogap ///
	label 
	
****
* Table A-13
****

eststo clear	

		eststo: quietly meoprobit Trust_Congress_Pre Belief_BlackCongress RR_Tesler Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed ///
				USSenator_Black MoC_Black True_BlackStateLeg  ||State: , cov(uns) 

		eststo: quietly meoprobit Trust_Congress_Pre Belief_BlackCongress RR_Tesler c.RR_Tesler#c.Belief_BlackCongress Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed ///
				USSenator_Black MoC_Black True_BlackStateLeg  ||State: , cov(uns)
		
		eststo: quietly meoprobit Trust_Congress_Pre Belief_BlackCongress RR_Kinder Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed ///
				USSenator_Black MoC_Black True_BlackStateLeg  ||State: , cov(uns) 

		eststo: quietly meoprobit Trust_Congress_Pre Belief_BlackCongress RR_Kinder c.RR_Kinder#c.Belief_BlackCongress Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed ///
				USSenator_Black MoC_Black True_BlackStateLeg  ||State: , cov(uns)
		
		esttab using "Tables/Appendix-Table-A-13.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
		se(3) star(* 0.05) /// Standard Errors at 3 Decimals
		order(Belief_BlackCongress RR_Tesler RR_Kinder c.RR_Tesler#c.Belief_BlackCongress c.RR_Kinder#c.Belief_BlackCongress Female Ideology Independent Republican StrongPartisan ///
					FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed USSenator_Black MoC_Black True_BlackStateLeg) ///
		varwidth(50) /// Limit Label to 35 characters, also needed for wrap option
		wrap /// Wraps long variable names
		eqlabels(none) /// Suppress Equation Labels
		coeflabels(c.Age$.c.Age "Age x. age" c.RR_Kinder#c.Belief_BlackCongress "Racial Resentment (Kinder & Sanders) x Est. % Black") ///
		nonumbers ///
		b(3) /// Three Decimal Places for Coefficients
		drop(var(_cons[State]) ) ///
		mtitles("(1)" "(2)" "(3)" "(4)") ///
		nogaps ///
		stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
		title(Table A-13: Ordered Probit Models: Perceptions of Black's inclusion in Congress and Trust in Congress) ///
		nonotes ///
		addnote("Standard errors in parentheses. * p < 0.05") ///
		nogap ///
		label 

****
* Table A-14
****
eststo clear	
		
	eststo: quietly meoprobit RepPeopleLikeMe_StateLeg True_BlackStateLeg Belief_BlackStateLeg Female RR_Tesler ///
			Ideology State_Ideology c.Ideology#c.State_Ideology  Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity||State: , cov(uns)

	eststo: quietly	meoprobit RepPeopleLikeMe_StateLeg True_BlackStateLeg Belief_BlackStateLeg Female RR_Tesler c.True_BlackStateLeg#c.RR_Tesler c.Belief_BlackStateLeg#c.RR_Tesler ///
			Ideology State_Ideology c.Ideology#c.State_Ideology  Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity||State: , cov(uns)

	eststo: quietly	meoprobit RepPeopleLikeMe_StateLeg True_BlackStateLeg Belief_BlackStateLeg Female RR_Kinder ///
			Ideology State_Ideology c.Ideology#c.State_Ideology  Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity||State: , cov(uns)

	eststo: quietly	meoprobit RepPeopleLikeMe_StateLeg True_BlackStateLeg Belief_BlackStateLeg Female RR_Kinder c.True_BlackStateLeg#c.RR_Kinder c.Belief_BlackStateLeg#c.RR_Kinder ///
			Ideology State_Ideology c.Ideology#c.State_Ideology  Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity||State: , cov(uns)
			
	esttab using "Tables/Appendix-Table-A-14.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
				order(True_BlackStateLeg Belief_BlackStateLeg Female RR_Tesler RR_Kinder c.True_BlackStateLeg#c.RR_Tesler c.Belief_BlackStateLeg#c.RR_Tesler c.True_BlackStateLeg#c.RR_Kinder c.Belief_BlackStateLeg#c.RR_Kinder ///
				Ideology State_Ideology c.Ideology#c.State_Ideology  Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity) ///
				eqlabels(none) /// Suppress Equation Labels
				coeflabels(c.Age$.c.Age "Age x. age" c.RR_Kinder#c.Belief_BlackStateLeg "Racial Resentment (Kinder & Sanders) x Est. % Black" c.RR_Kinder#c.True_BlackStateLeg "Racial Resentment (Kinder & Sanders) x Black in Leg") ///
				mtitles("(1)" "(2)" "(3)" "(4)") ///
				varwidth(42) /// Limit Label to 35 characters, also needed for wrap option
				wrap /// Wraps long variable names
				se(3) star(* 0.05) /// Standard Errors at 3 Decimals
				nonumbers ///
				b(3) /// Three Decimal Places for Coefficients
				drop(var(_cons[State]) ) ///
				stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
				title(Table A-14: Ordered Probit Models: Perceptions of Blacks in State Legislatures and Responsiveness of State Legislatures)       ///
				nogap ///
				label 
***
* Table A-15
***
eststo clear	

eststo:	quietly meoprobit Trust_StateLeg_Pre True_BlackStateLeg Belief_BlackStateLeg Female RR_Tesler ///
		Ideology State_Ideology c.Ideology#c.State_Ideology  Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity||State: , cov(uns)

eststo: quietly	meoprobit Trust_StateLeg_Pre True_BlackStateLeg Belief_BlackStateLeg Female RR_Tesler c.True_BlackStateLeg#c.RR_Tesler c.Belief_BlackStateLeg#c.RR_Tesler ///
		Ideology State_Ideology c.Ideology#c.State_Ideology  Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity||State: , cov(uns)

eststo: quietly	meoprobit Trust_StateLeg_Pre True_BlackStateLeg Belief_BlackStateLeg Female RR_Kinder ///
		Ideology State_Ideology c.Ideology#c.State_Ideology  Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity||State: , cov(uns)

eststo: quietly	meoprobit Trust_StateLeg_Pre True_BlackStateLeg Belief_BlackStateLeg Female RR_Kinder c.True_BlackStateLeg#c.RR_Kinder c.Belief_BlackStateLeg#c.RR_Kinder ///
		Ideology State_Ideology c.Ideology#c.State_Ideology  Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity||State: , cov(uns)
		
esttab using "Tables/Appendix-Table-A-15.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
			order(True_BlackStateLeg Belief_BlackStateLeg Female RR_Tesler RR_Kinder c.True_BlackStateLeg#c.RR_Tesler c.Belief_BlackStateLeg#c.RR_Tesler c.True_BlackStateLeg#c.RR_Kinder c.Belief_BlackStateLeg#c.RR_Kinder ///
			Ideology State_Ideology c.Ideology#c.State_Ideology  Congruence Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity) ///
			eqlabels(none) /// Suppress Equation Labels
			coeflabels(c.Age$.c.Age "Age x. age" c.RR_Kinder#c.Belief_BlackStateLeg "Racial Resentment (Kinder & Sanders) x Est. % Black" c.RR_Kinder#c.True_BlackStateLeg "Racial Resentment (Kinder & Sanders) x Black in Leg") ///
			mtitles("(1)" "(2)" "(3)" "(4)") ///
			varwidth(42) /// Limit Label to 35 characters, also needed for wrap option
			wrap /// Wraps long variable names
			se(3) star(* 0.05) /// Standard Errors at 3 Decimals
			nonumbers ///
			b(3) /// Three Decimal Places for Coefficients
			drop(var(_cons[State]) ) ///
			stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
			title(Table A-15: Ordered Probit Models: Perceptions of Blacks in State Legislatures and Trust of State Legislatures)       ///
			nogap ///
			label 

****
* Table A-16
****
			
eststo clear		
	
		eststo: quietly probit OverEstimate_WomenCongress Female StrongPartisan FederalKnowledge Fem_Tesler Age c.Age#c.Age White CollegeDegree Income MoC_Female USSenator_Female [pweight=teamweight]
				*margins, at(CollegeDegree = (0 1)) contrast(atcontrast(r._at) nowald)
	
		eststo: quietly probit OverEstimate_WomenStateLeg Female StrongPartisan StateKnowledge Fem_Tesler Age c.Age#c.Age White CollegeDegree Income LogDistancefromCapital  [pweight=teamweight]
				*margins, at(CollegeDegree = (0 1)) contrast(atcontrast(r._at) nowald)
	
		eststo: quietly probit OverEstimate_BlackCongress Female StrongPartisan FederalKnowledge RR_Tesler Age c.Age#c.Age Black CollegeDegree Income MoC_Black USSenator_Black [pweight=teamweight]
				*margins, at(CollegeDegree = (0 1)) contrast(atcontrast(r._at) nowald)
	
		eststo: quietly probit OverEstimate_BlackStateLeg Female StrongPartisan StateKnowledge RR_Tesler Age c.Age#c.Age Black CollegeDegree Income LogDistancefromCapital  [pweight=teamweight]
				*margins, at(CollegeDegree = (0 1)) contrast(atcontrast(r._at) nowald)
	
		esttab using "Tables/Appendix-Table-A-16.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
			order(Female StrongPartisan FederalKnowledge StateKnowledge Fem_Tesler RR_Tesler Age c.Age#c.Age White Black CollegeDegree Income MoC_Female MoC_Black USSenator_Female USSenator_Black LogDistancefromCapital) ///
			eqlabels(none) /// Suppress Equation Labels
			mtitles("Women Congress" "Women State Legislature" "Black Congress" "Black State Legislature") ///
			varwidth(42) /// Limit Label to 35 characters, also needed for wrap option
			wrap /// Wraps long variable names
			se(3) star(* 0.05) /// Standard Errors at 3 Decimals
			nonumbers ///
			b(3) /// Three Decimal Places for Coefficients
			stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
			title(Table A-16: Whether a Respondent Overestimated Levels of Descriptive Representation)       ///
			addnote("This table reports the results of a probit regression in which the outcome of interest is whether a respondent overestimates the percentage of women or Blacks in their legislature. Standard errors in parentheses, *p < 0.05") ///
			nogap ///
			label 
	
****
* Table A-17
****
	eststo clear
	
		eststo: reg OverEstimate_WomenCongress_Size Female StrongPartisan FederalKnowledge Fem_Tesler Age c.Age#c.Age White CollegeDegree Income MoC_Female USSenator_Female [pweight=teamweight]
		eststo: reg OverEstimate_WomenStateLeg_Size Female StrongPartisan StateKnowledge Fem_Tesler Age c.Age#c.Age White CollegeDegree Income LogDistancefromCapital  [pweight=teamweight]
		eststo: reg OverEstimate_BlackCongress_Size Female StrongPartisan FederalKnowledge RR_Tesler Age c.Age#c.Age Black CollegeDegree Income MoC_Black USSenator_Black [pweight=teamweight]
		eststo: reg OverEstimate_BlackStateLeg_Size Female StrongPartisan StateKnowledge RR_Tesler Age c.Age#c.Age Black CollegeDegree Income LogDistancefromCapital  [pweight=teamweight]
	
	esttab using "Tables/Appendix-Table-A-17.rtf", interaction(" x ")  fonttbl(/f0/fnil Garamond; ) replace ///
			eqlabels(none) /// Suppress Equation Labels
			mtitles("Women Congress" "Women State Legislature" "Black Congress" "Black State Legislature") ///
			order(Female StrongPartisan FederalKnowledge StateKnowledge Fem_Tesler RR_Tesler Age c.Age#c.Age White Black CollegeDegree Income MoC_Female MoC_Black USSenator_Female USSenator_Black LogDistancefromCapital) ///
			varwidth(50) /// Limit Label to 35 characters, also needed for wrap option
			wrap /// Wraps long variable names
			se(3) star(* 0.05) /// Standard Errors at 3 Decimals
			nonumbers ///
			b(3) /// Three Decimal Places for Coefficients
			nogaps ///
			title(Table A-17: Predicting Difference between respondents' beliefs about and actual descriptive representation) ///
			nonotes ///
			addnote("This table reports the results of a linear regression in which the outcome of interest is the difference between a respondent's beliefs about descriptive representation and actual levels of descriptive representation, where positive values are overestimates. Standard errors in parentheses, *p < 0.05") ///
				nogap ///
				label 
	
****
* Table A-18
****
	eststo clear
	
		eststo: reg WomenCongress_Error Female StrongPartisan FederalKnowledge Fem_Tesler Age c.Age#c.Age White CollegeDegree Income MoC_Female USSenator_Female [pweight=teamweight]
		eststo: reg WomenStateLeg_Error Female StrongPartisan StateKnowledge Fem_Tesler Age c.Age#c.Age White CollegeDegree Income LogDistancefromCapital  [pweight=teamweight]
		eststo: reg BlackCongress_Error Female StrongPartisan FederalKnowledge RR_Tesler Age c.Age#c.Age Black CollegeDegree Income MoC_Black USSenator_Black [pweight=teamweight]
		eststo: reg BlackStateLeg_Error Female StrongPartisan StateKnowledge RR_Tesler Age c.Age#c.Age Black CollegeDegree Income LogDistancefromCapital  [pweight=teamweight]
	
	esttab using "Tables/Appendix-Table-A-18.rtf", interaction(" x ")  fonttbl(/f0/fnil Garamond; ) replace ///
			eqlabels(none) /// Suppress Equation Labels
			mtitles("Women Congress" "Women State Legislature" "Black Congress" "Black State Legislature") ///
			order(Female StrongPartisan FederalKnowledge StateKnowledge Fem_Tesler RR_Tesler Age c.Age#c.Age White Black CollegeDegree Income MoC_Female MoC_Black USSenator_Female USSenator_Black LogDistancefromCapital) ///
			varwidth(50) /// Limit Label to 35 characters, also needed for wrap option
			wrap /// Wraps long variable names
			se(3) star(* 0.05) /// Standard Errors at 3 Decimals
			nonumbers ///
			b(3) /// Three Decimal Places for Coefficients
			nogaps ///
			title(Table A-18: Predicting size of error between respondents' beliefs about and actual descriptive representation) ///
			nonotes ///
			addnote("This table reports the results of a linear regression in which the outcome of interest is the absolute value of the difference between a respondent's beliefs about descriptive representation and actual levels of descriptive representation. Standard errors in parentheses, *p < 0.05") ///
				nogap ///
				label 

****
* Table A-19
****

eststo clear
	
		eststo: quietly probit WomenCongress_Correct Female StrongPartisan FederalKnowledge Age c.Age#c.Age Fem_Tesler White CollegeDegree Income MoC_Female USSenator_Female [pweight=teamweight]
				*margins, at(CollegeDegree = (0 1)) contrast(atcontrast(r._at) nowald)
	
		eststo: quietly probit WomenStateLeg_Correct Female StrongPartisan StateKnowledge Age c.Age#c.Age Fem_Tesler Black CollegeDegree Income MoC_Black USSenator_Black [pweight=teamweight]
				*margins, at(CollegeDegree = (0 1)) contrast(atcontrast(r._at) nowald)
						
		eststo: quietly probit BlackCongress_Correct Female StrongPartisan FederalKnowledge Age c.Age#c.Age RR_Tesler White CollegeDegree Income LogDistancefromCapital  [pweight=teamweight]
				*margins, at(CollegeDegree = (0 1)) contrast(atcontrast(r._at) nowald)
	
		eststo: quietly probit BlackStateLeg_Correct Female StrongPartisan StateKnowledge Age c.Age#c.Age RR_Tesler Black CollegeDegree Income LogDistancefromCapital  [pweight=teamweight]
				*margins, at(CollegeDegree = (0 1)) contrast(atcontrast(r._at) nowald)
	
		esttab using "Tables/Appendix-Table-A-19.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
			order(Female StrongPartisan FederalKnowledge StateKnowledge Fem_Tesler RR_Tesler Age c.Age#c.Age White Black CollegeDegree Income MoC_Female MoC_Black USSenator_Female USSenator_Black LogDistancefromCapital) ///
			eqlabels(none) /// Suppress Equation Labels
			mtitles("Women Congress" "Women State Legislature" "Black Congress" "Black State Legislature") ///
			varwidth(42) /// Limit Label to 35 characters, also needed for wrap option
			wrap /// Wraps long variable names
			se(3) star(* 0.05) /// Standard Errors at 3 Decimals
			nonumbers ///
			b(3) /// Three Decimal Places for Coefficients
			stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
			title(Table A-19: Respondents Correctly Estimating Descriptive Representation)       ///
			addnote("This table reports the results of a probit regression in which the outcome of interest is whether a respondent's estimate of the percentage of women or Blacks in their legislature was within 5% of the actual percentage. Standard errors in parentheses, *p < 0.05 ") ///
			nogap ///
			label 

****
* Table A-20
****
eststo clear

		eststo: quietly meoprobit Trust_Congress_Pre Belief_WomenCongress Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
				USSenator_Female MoC_Female True_WomenStateLeg  ||State: , cov(uns) 
				*margins, at(Belief_WomenCongress = (25 35)) contrast(atcontrast(r._at) nowald)

		eststo: quietly meoprobit Trust_Congress_Pre Belief_WomenCongress Female c.Belief_WomenCongress#c.Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
				USSenator_Female MoC_Female True_WomenStateLeg c.USSenator_Female#c.Female c.MoC_Female#c.Female c.True_WomenStateLeg#c.Female  ||State: , cov(uns) 

		eststo: quietly meoprobit Trust_Congress_Pre Belief_BlackCongress Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed ///
				USSenator_Black MoC_Black True_BlackStateLeg  ||State: , cov(uns) 
				*margins, at(Belief_BlackCongress = (25 35)) contrast(atcontrast(r._at) nowald)

		eststo: quietly meoprobit Trust_Congress_Pre Belief_BlackCongress c.Belief_BlackCongress#c.Black  Female Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree Black Age c.Age#c.Age Employed ///
				USSenator_Black MoC_Black True_BlackStateLeg c.USSenator_Black#c.Black c.MoC_Black#c.Black c.True_BlackStateLeg#c.Black  ||State: , cov(uns) 
				*margins, at(Belief_BlackCongress = (25 35)) contrast(atcontrast(r._at) nowald)

esttab using "Tables/Appendix-Table-A-20.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
		se(3) star(* 0.05) /// Standard Errors at 3 Decimals
		order(Belief_WomenCongress Belief_BlackCongress Female Black c.Belief_WomenCongress#c.Female c.Belief_BlackCongress#c.Black Ideology Independent Republican StrongPartisan ///
				FederalKnowledge Religiosity CollegeDegree White Age c.Age#c.Age Employed ///
				USSenator_Female MoC_Female True_WomenStateLeg c.USSenator_Female#c.Female c.MoC_Female#c.Female c.True_WomenStateLeg#c.Female ///
				USSenator_Black MoC_Black True_BlackStateLeg c.USSenator_Black#c.Black c.MoC_Black#c.Black c.True_BlackStateLeg#c.Black) ///
		varwidth(50) /// Limit Label to 35 characters, also needed for wrap option
		wrap /// Wraps long variable names
		eqlabels(none) /// Suppress Equation Labels
		nonumbers ///
		b(3) /// Three Decimal Places for Coefficients
		mtitles("Current Study Women" "Current Study Women" "Current Study Blacks" "Current Study Blacks") ///
		nogaps ///
		stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
		drop(var(_cons[State]) ) ///
		title(Table A-20: Ordered Probit Models: Perceptions of Women's & Black's inclusion in Congress and Trust in Congress) ///
		nonotes ///
		addnote("Standard errors in parentheses. * p < 0.05") ///
		nogap ///
		label 
		
****
* Table A-21
****

eststo clear
		
		*Additive No Perceptions
		eststo: quietly meoprobit Trust_StateLeg_Pre True_WomenStateLeg Female Ideology State_Ideology c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
		Age c.Age#c.Age White CollegeDegree Employed Religiosity if Belief_WomenStateLeg!=. ||State: , cov(uns) 
			*margins, at(True_WomenStateLeg = (25 35)) contrast(atcontrast(r._at) nowald)

		*Interactive No Perceptions
		eststo: quietly meoprobit Trust_StateLeg_Pre True_WomenStateLeg Female c.True_WomenStateLeg#c.Female Ideology State_Ideology  c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
			Age c.Age#c.Age White CollegeDegree Employed Religiosity if Belief_WomenStateLeg!=. ||State: , cov(uns) 
		
		*Additive Perceptions
		eststo: quietly meoprobit Trust_StateLeg_Pre True_WomenStateLeg Belief_WomenStateLeg Female Ideology State_Ideology c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
			Age c.Age#c.Age White CollegeDegree Employed Religiosity||State: , cov(uns) 
			*margins, at(Belief_WomenStateLeg = (25 35)) contrast(atcontrast(r._at) nowald)

		*Interactive Perceptions 
		eststo:	quietly meoprobit Trust_StateLeg_Pre True_WomenStateLeg Belief_WomenStateLeg Female c.True_WomenStateLeg#c.Female c.Belief_WomenStateLeg#c.Female Ideology State_Ideology  c.Ideology#c.State_Ideology Congruence ///		
		Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age White CollegeDegree Employed Religiosity||State: , cov(uns)


	esttab using "Tables/Appendix-Table-A-21.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
			order(True_WomenStateLeg Belief_WomenStateLeg Female c.True_WomenStateLeg#c.Female c.Belief_WomenStateLeg#c.Female Ideology State_Ideology  c.Ideology#c.State_Ideology Congruence ///		
			Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age White CollegeDegree Employed Religiosity) ///
			eqlabels(none) /// Suppress Equation Labels
			mtitles("(1)" "(2)" "(3)" "(4)") ///
			varwidth(42) /// Limit Label to 35 characters, also needed for wrap option
			wrap /// Wraps long variable names
			se(3) star(* 0.05) /// Standard Errors at 3 Decimals
			nonumbers ///
			b(3) /// Three Decimal Places for Coefficients
			stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
			drop(var(_cons[State]) ) ///
			title(Table A-21: Ordered Probit Models: Perceptions of Women in State Legislatures and Trust in State Legislatures)       ///
			nogap ///
			label 
			
***
* Table A-22
***

eststo clear
	
		*Additive No Perceptions
		eststo: quietly meoprobit Trust_StateLeg_Pre True_BlackStateLeg Female Ideology State_Ideology c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
		Age c.Age#c.Age Black CollegeDegree Employed Religiosity if Belief_BlackStateLeg!=. ||State: , cov(uns) 
		
		*Interactive No Perceptions
		eststo: quietly meoprobit Trust_StateLeg_Pre True_BlackStateLeg Female c.True_BlackStateLeg#c.Black Ideology State_Ideology  c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
			Age c.Age#c.Age Black CollegeDegree Employed Religiosity if Belief_BlackStateLeg!=. ||State: , cov(uns) 
		
		*Additive Perceptions
		eststo:	quietly meoprobit Trust_StateLeg_Pre True_BlackStateLeg Belief_BlackStateLeg Female Ideology State_Ideology c.Ideology#c.State_Ideology Congruence Republican Independent StrongPartisan StateKnowledge ///
			Age c.Age#c.Age Black CollegeDegree Employed Religiosity||State: , cov(uns) 
		*margins, at(True_BlackStateLeg = (25 35)) contrast(atcontrast(r._at) nowald)

		*Interactive Perceptions 
		eststo:	quietly meoprobit Trust_StateLeg_Pre True_BlackStateLeg Belief_BlackStateLeg Female c.True_BlackStateLeg#c.Black c.Belief_BlackStateLeg#c.Black Ideology State_Ideology c.Ideology#c.State_Ideology Congruence ///		
		Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity||State: , cov(uns)
			*margins, at(True_BlackStateLeg = (25 35)) contrast(atcontrast(r._at) nowald)

	esttab using "Tables/Appendix-Table-A-22.rtf", interaction(" x ") fonttbl(/f0/fnil Garamond ) replace ///
			order(True_BlackStateLeg Belief_BlackStateLeg Female c.True_BlackStateLeg#c.Black c.Belief_BlackStateLeg#c.Black Ideology State_Ideology c.Ideology#c.State_Ideology Congruence ///		
			Republican Independent StrongPartisan StateKnowledge Age c.Age#c.Age Black CollegeDegree Employed Religiosity) ///
			eqlabels(none) /// Suppress Equation Labels
			mtitles("(1)" "(2)" "(3)" "(4)") ///
			varwidth(42) /// Limit Label to 35 characters, also needed for wrap option
			wrap /// Wraps long variable names
			se(3) star(* 0.05) /// Standard Errors at 3 Decimals
			nonumbers ///
			b(3) /// Three Decimal Places for Coefficients
			stats(N ll, fmt(0 1) labels("N" "Log-Likelihood")) ///Print the N and Log-Likehood (Number of observations is suppressed when calling scalars)
			drop(var(_cons[State]) ) ///
			title(Table A-22: Ordered Probit Models: Perceptions of Blacks in State Legislatures and Trust in State Legislatures)       ///
			nogap ///
			label 